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ABSTRACT 


The desire for heightened productivity in 
the application development process has 
created an increased interest in applica- 
tion generators. Patient Care System/ 
Application Development System (PCS/ADS) 
is a general purpose, CICS-based applica- 
tion generator that is used primarily in 
the health care field. It has been in use 
at The University of Iowa Hospitals since 
1978. In conjunction with other applica- 
tion development tools, it is responsible 
for a substantial reduction in the amount 
of time and effort required to develop 
new applications. 
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University of Iowa Hospitals Background 


The University of Iowa Hospitals, with 1,100 beds, 1,000 physicians and dentists, 
1,400 nursing personnel, and a support staff of 3,500, is the largest university- 
owned, teaching hospital in the nation. As Iowa's tertiary-level health care 
center, it served 40,000 inpatients and 335,000 outpatients last year. The 
Information Systems Department was formed in 1970, and the first application, 
Clinic Scheduling and Patient Registration, went into production in 1973. At 
that time, the Hospitals' terminal network consisted of ten terminals and one 
printer, connected to an IBM 360 Model 40 computer. Today, the Hospital Inform- 
ation System has grown to include 13 major applications running on dual IBM 

3081 computers, with a local network of 450 CRT terminals and 150 printers. 


When application development began in 1970, it was based on the use of CICS 
macro-level Assembler language and a structure of indexed and direct files. 
By 1976, with new applications growing in complexity, increasing requirements 
for modifications to be made to existing applications, and continuing demand 
for new information to be added to the files, new development was becoming 
increasingly more difficult and time consuming. A search was begun for tools 
that would help speed up the development process and ease future maintenance 
and modifications. One of the tools acquired in 1978 was PCS/ADS. 


PCS/ADS Description 


Patient Care System/Application Development System is a very flexible applica- 
tion generator that runs as a CICS transaction. While it was developed at 
Duke University Hospital and marketed by IBM primarily to health care insti- 
tutions, it is actually a general-purpose development tool. The keys to its 
operation are the "Symbol Table", used to pass data, and the “Execution Stack", 
used to control execution of PCS commands and application programs. Each PCS 
transaction has its own stack and symbol table. See Figure 1 for a diagram 

of the PCS Execution Environment. The first detail to notice in the diagram 

is that all data passage is through the symbol table. Data retrieved from the 
data base by the PCS Data Manager is placed in the symbol table for use by the 
application. Data to be passed between parts of an application, such as two 
different screens, is placed into and retrieved from the symbol table. Data 

in the symbol table is accessed only by name. Applications are not aware of 
the structure of the data base or of the format of the data in the symbol table. 
This provides a high degree of independence between applications and data and 
helps to minimize the impact that a change to part of an application has on the 
rest of the application. 


The Execution Stack is a last-in/first-out stack that controls the sequence 
of execution of the parts of an application. Applications can place the names 
of screens to be displayed or modules to be executed on the stack. PCS will 
then display the screen or execute the module whose name is currently on top 
of the stack. 
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Figure 1 


The PCS Data Editor provides about 30 standard edit functions for use by appli- 
cations. Data to be edited must be in the symbol table. , 


The PCS Data Manager provides access to VSAM files or IMS data bases without 
requiring the application developer to be aware of the data structure in the 
file or data base. Through the PCS Data Directory, it provides the ability to 
map data from records or segments to the data lists required by the application. 
As with the symbol table, the Data Manager helps to isolate applications from 
physical data structures. Such isolation is extremely desirable when applica- 
tions or data structures must be changed. 


A short example of a PCS application will now be presented to illustrate some 
typical PCS features. This application consists of five screens that collect 
a user's sign-on information, present three levels of function menu-selection 


screens, and finally display the user's profile information. The extensive 


use of light-pen selectable menu lists is very typical of PCS applications. 


Figure 2 shows the sign-on screen "DOCSSION" as it appears on the terminal. 
Figure 3 shows the screen definition for the DOCSSION screen. There are two 
parts to the screen definition. The top part defines the appearance of the 
screen, including the locations and types of input and output fields, and any 
literal text contained in it. The bottom part of the screen definition is the 
processing section. This screen has three output fields that are scanned 
horizontally and three input fields that are scanned vertically. The output 
fields display the variables T-SYSTEM, which is equal to "IHISNET2", SYSDTTM, 
which is "07/28/83 15:18", and ERRMSG, which is blank, from the symbol table. 
The first two input fields move data to the symbol table variables SIGNONID 
and PASSWORD. The third input field, SIGNOFF, is light-pen detectable and 
causes the user to be signed off of PCS. 


Figure 4 shows the next screen that is displayed after the user ID and password 
have been successfully entered. It is a PCS menu screen that is part of our 
own security system and is used only for testing. It allows the application 
developer to emulate any user environment and perform any application function. 
In the production environment, the security system uses PCS menu selection 
screens to restrict each terminal operator to a set of functions that he re- 
quires to do his job. In addition, his visibility is limited to patients within 
his area of the Hospital. In this example, the terminal operator will use the 
light-pen to select a menu of "Technical Support" functions. 


Figure 5 shows the screen definition for the screen that appears in Figure 4. 

It illustrates some of the processing power available in screen definitions. 
Notice that for the selected "Technical Support" option, the values of several 
variables in the symbol table are checked before the name of the next screen 

to be displayed is placed on top of the stack. If the conditions are not sat- 
isfied, this same screen (MSTPCQ9%) is displayed again with an error message. 
Further up in the definition, there is also a good example of multiple operations 
being placed on the execution stack. If the terminal user selects "Department", 
three program names and a screen name will be pushed into the stack, with the 
last one, screen name MSTPCQP~%, being the first one in and, therefore, the last to 
be used. The result will be that programs PCSC316, PCSC317, and PCSC318 will be 
executed in that order and then screen MSTPCQ9% will be displayed. 
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* COMPUTER OPERATIONS ; ces aereeiee any of these variables in this DCL, they remain cleared. The second DCL, in 
a SIPS (CCU PSYSUEMT: PHESNET2 Fi ES Sree TT SME it Oe aya aa Figure 13, is shorter but illustrates an interesting feature of DCL's. The 
(T-DEPT="INF’ & T-DIVSN=’TOP’)) 000982 = 10/26 / : ; wea < N 
THEN ’$S=MSTPC2WO’ ~ 900983. — «10/26/82 first statement sets the variable "Fl" in the symbol table to the value ENTR/ 
Bes ae acer aid a ne aon ia AUTHORIZED FOR Cece ise UPOPERID/SIGNONID". The second statement invokes program "$FN" to assign a 
eK, = Fo ke . " tos 
Bi Ses aaa crea 00 1000 . value to variable "FICC" in the symbol table. In order for the DCL to complete, 
!$CMDO01 001 $IF=((T-SYSTEM=’IHISNETA’! T-SYSTEM=/IHISNETB’ ) 001001 10/14/82 $FN must assign a value to F1CC. This is a general feature of DCL's. The DCL 
THEN ‘ERRMSG=*** ERROR - DEMONSTRATION NOT VALID 001002 10/14/82 will continue to be re-executed until all data specified for collection by the 
ON THIS NETWORK «**,$S=MSTPCOOO’ 001003 10/14/82 DCL has b 11 d 
ELSE ’$S=PCSPC354’); 001004 =10/ 14/82 as been collected. 
SUPPOR 00 1005 (eee 
'$CM001 001 $IF=(((T-SYSTEM=/IHISNET2’} T-SYSTEM=’ IHISNET1’) 1001021 10/26/8 . A 7 & . 
(T-DEPT=’INF’ & T-DIVSN=’TOP’)) "1901022 10/26/82 Figure 14 shows the final screen of the transaction, a display of the terminal 
THEN '$S=MSTPC2LO’ '001023 = 12/09/82 user's security profile. 
ELSE ‘ERRMSG=*** ERROR - USER NOT AUTHORIZED FOR 001024 He re 
| IHLS FUNCTIO ** $S= ‘); ‘(001025 10/26/82 Bu eying . 
er SECURITY Ee re er op igde 40/14/62 In all of the screen definitions and DCL's that made up this example, no data 
1$CMDO1 001 $PROG=PCSC306 , $S=MSTPCOOO; 001027 10/26/82 base accesses were shown. However, it is very simple to issue a command from 
* SIGN OFF ‘ eee either a screen definition or a DCL that will move data between the symbol table 
pSemEOt” «GO! aes and a data base. An example of such a command is "$DM=(GET=TESDATA)". In this 


case, there would be an entry for "TESDATA" in the PCS Data Directory that maps 


fields in the data base, possibly in multiple segments, onto variables in the 
Figure 5. Screen definition for MSTPCOD9 PCS symbol table. cae y p g 


Se eee eee ee eee ee eee a eee 6 1 eG ieee Neher serene ce tee 
SELECT OPTION gee? ea ee Ra ne ERE SRE ee 
SYSTEM STACK 

* AANTPULATE THE SYSTern STACK. CRD OPER AND 
MANIPULATE THE SYMBOL TABLE. 

~ EXECUTE WEXT STACK ITEM, 

END DEBUG MODE COR PFS) 


{ os baAck 
- oY MBOL. 
3 EXIT 

4 EMO DEBUG - 


USE OF TION 3 GR PROBE CONTINUE 
TO EXECUTE THE NEXT STACK ITEM. 


Go MOST RECENTLY | 
QOEYECUTED COMMAND | 
SEX USETOOOL | 

{nd0¥ ond ssins jsbnd”da0b;oeni sous. onss:dued.deee =| 
“RETURN CODE | 
AFTER EXECUTION | 
0000 | 


| 
| 
| 
| 
| 
| 
| 
| 
| 
oF. e 
| 
| 
| 
| 
| 
| 
| 


$8 MST ee O BASE 


bee Aeee Rese caus cane sone pees seen eoee anes ees nese eeee sone Oped Opes sans caer anes atee aeee 


DE BUGGY” . 2. w Selle ada 2 eG cutle eh ele he ah aad ee ae RS ee Be a Ge en CONTINUE 


i D a 2 


1@W0ECCERCEOEEEEEOREREOEEEOEDEEEEEEQEEBELEREEREEEEEEEEEEE (EGER EEECEEECERECLEERKOT 
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Figure 8. Symbol table and modification screen 
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lseoG: PCSC305 . $S=PCSPC324. T-STATUS=10:1 
$R=S; 
$AUTO $S=PCSPC304; 


Figure 11. Screen definition for screen PCSPC304 


!SIGN-OFF 


T-DBFUNC=PSWD , $P=PCSPD303 , $P=PCSP0307 , $S=PCSPC313, 


0000 10 
000020 
000030 
000040 
000050 
000060 
000070 
000080 
000090 
000 100 
000110 
000 120 
000130 
000140 
000 150 
000 160 
000170 
000180 
000190 
000200 
0002 10 
000220 
000221 
000240 
000250 
000861 
000862 
000880 
000830 
0003900 
0009 10 
000920 
000930 
000340 
000950 
000960 


12/06/82 


12/06/82 
12/06/82 


DCL. REPLACE PCSPD303 
50 CPOEPTA 
50. CPSNAME 
50 FS 
50 FO 
50 NEWSPNM 
50 NEWSOFNM 
50 OLDSOFNM 
50 OLDSPNM 
50 SCOFCNEW 
50 SCOFCOLO 
50 SUPVNEW 
50 SUPVOLD 
50 T-BRTHOT 
50 T-COUNT 
50 T-DOCNUM 
50 T-DEPT1 
50 T-DEPT2 
sO T-DEPT3 
50 T-NEWPSW 
5O T-OLOPSw 
50 T-OPERID 
50 T-OPSWRD 
50 T-PASSWD 
50 T-REASON 
50 T-SECNME 
50 T-SPVNME 
50 T-SRNNMA 
50 T-SRNNMB 
50 T-TITLE 
50 T-UPPSWO 
sO T-USERID 
SO. UPCSSNID 
50 UPCSSNL 
50 UPCSSNPS 
50 UPBRTHMO 
50 UPBRTHDA 
50 UPBRTHYR 

50 UPCURSPV 
50 UPDEPTA 
50 UPDEPTB 
50 UPDEPTC 
50 UPEMNRUM 
50 UPLUPOTN 
50 UPLUPDTT 
50 UPOPERID 
50 UPPSWDTE 
50 UPRUPTO 
50 UPSECOFC 
50 UPSECLV 
50 UPSNAME 
50 UPSRNID 
50 UPSRNIDB 
50 UPTITLE 
50 -UPTRNDOTE 
50 UPTRNFLG 
50 UPTRNSCN 
50 USERNAME 


DCL. REPLACE PCSPD309 
10 F 1 
10 Ficc 


Figure 12. Data Collection List PCSPD393 


Figure 13. 


ENTR/}UPOPERID!SIGNONID: 
$PROG=$FN; 


Data Collection List PCSPD309 


000 100 
000110 
000120 


. 000130 


000140 
000 150 
000 160 
000170 
000180 
000 190 
000200 
0002 10 
000220 
000230 
000240 
000250 
000260 
000270 
000280 
000290 
000300 
000310 
000320 
000330 
000340 
000350 
000360 
000370 
000380 
000390 
000400 
0004 10 
000420 
000430 
000440 
000450 
000460 
000470 
000480 
000430 
000500 
000510 
000520 
000530 
000540 
000550 
000560 
000570 
000580 


0000 10 
000020 
000030 
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USER PROFILE SECURITY 


USER : 

BIRTH DATE: 
EMPLOYEE NUMBER : 
SECURITY LEVEL: 
DEPARTMENT : 
DIVISTON: 
FOrULAT ION: 


SUPERVISOR : 
SECURTTY OFFICER: 


PASSWORD LAST CHANGED : 
PROP TLE LAST UPDATED : 


ee a4 


Figure 14. 


DISFLAT 


414 06440 (1988 
PIPIIIIDDY 


SECURITY FUNCTION I 
INFORMATION SYSTEMS 
TECHNICAL OFERATIONS 
NOT APPLICABLE 


08/16/83 


O/16/B3 14:16 BY DALE WILHELM 


wonmme OSE GSES 43224 


SECURT TY 


User profile display screen 


MASTER 


STGN-OFF 
12200200 @CQ00E 222 CQCLEEEEEEEELELHCEOEURELRGEQEREEEREGECROREEBABBEBERBEREEEBERUT 


JOHW SBITH sha Sloe Sead eth ibe esses aosd De eee 


qr 
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In addition to the Screen Manager and the DCL Processor, there is one additional, 


widely-used PCS manager that did not appear in the example; that is the Print 
Manager. The PCS Print Manager uses Print Definitions that are very similar to 
Screen Definitions in appearance, capability, and use. The difference between 
them is that the Print Definitions have no input fields. Output can be routed 
to individual printers or to groups of printers, and routing can be either mixed 
or dynamic. 


The purpose of this brief description has been to give you a feel for how PCS 
works, and to give an idea of its power, flexibility, and ease of use. With 
the information that I've presented, you could understand most straightforward 
PCS transactions, and you could probably code a simple transaction. Compare 
that with the level of knowledge and effort required to code a command-level 
CICS transaction. 


The Application Development Environment 


The application development environment is not just the sum of the tools and 
methodologies that make it up. A poorly matched set will yield disappointing 
results. A well chosen set of complementary tools and methodologies will show 
a synergistic effect, yielding exceptional results. For this reason, it is 
difficult to evaluate the effectiveness of a part of the development environ- 
ment, such as PCS/ADS, in isolation. 


The development environment at The University of Iowa Hospitals is shown in 
Figure 15. Combined with a development methodology that emphasizes proto- 
typing and iterative development of large applications, the tools shown have 
proven to be very satisfactory. However, since all of them, except the Data 
Directory and Data Dictionary, which are more recent additions, came into use 
in the same time frame, it is difficult to attribute particular increases in 
productivity to individual tools. 


Since PCS/ADS is so well suited to prototyping and iterative development, I 
would like to briefly comment about those two techniques. Prototyping involves 
building a mock-up system for demonstration to the user prior to development of 
the complete functional system. This allows the user to actually operate a 
terminal to see what his final system will look like and what it will be like 
to use. This is much more effective in eliciting comments, criticisms, and 
suggestions than thirty pages of paper screen simulations. It helps to avoid 
the "But that isn't what I wanted" types of problems that can occur at the end 
of a project. 


Iterative development is a natural follow-on to prototyping. It involves grad- 
ually replacing the simulated data and flow controls of the prototype with real 
data and application logic. PCS/ADS is ideally suited to these techniques. It 
is nearly as easy to code PCS Screen and Print Definitions as it is to just lay 
out an image of the screen on a piece of paper. Fields that will eventually be 
used to display variables have constants coded into them instead, and what will 
eventually be processing logic in the screen definition is simply coded as a 
call to the next screen. These prototype screen definitions are simple enough 
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The University of Iowa Hospitals and Clinics 


Application Development Environment 


















AUTOMATIC 
DIRECTORY 
GENERATOR 






ISPF/PDF 






PCS 
SCREEN, 
PRINT, 
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Figure 15. University of Iowa Hospitals Development Environment 
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so that they can be created or modified by user personnel. Once the prototype 
screen definitions have been finalized, programs, DCL's, and data base accesses 
can be added to complete the application. If the user is kept involved during 
this process, misunderstandings and changes in requirements can be caught before 
they become major problems. 


While I have seen some claims that PCS/ADS applications can be developed by user 
personnel without the assistance of professional programmer/analysts, and I 
understand that this is being done at some institutions, it has not been our 
policy to do so at The University of Iowa Hospitals. There are two primary 
reasons for this decision. First, our applications are developed around an 
integrated Hospital Data Base. Its evolution and use must be centrally coor- 
dinated and controlled. Second, while it may not be prohibitively difficult 

to train user personnel to use PCS/ADS effectively, we have not felt that it 
would be practical to train them to develop, document, and maintain complex inter- 
related application systems. 


The PCS application developers at The University of Iowa Hospitals have primary 
skills of systems analysis and design, although they are also able to write any 
CICS PL/I Command language programs that are required. I feel that this emphasis 
on analysis, design, and familiarity with the application area has been most 
beneficial. Serious or fatal flaws in applications systems are usually in the 
design of the system, rather than in its programming. I think that this em- 


phasis on design, which is a direct result of the power and ease of use of PCS, eine 
has enabled us to produce more usable and reliable systems than would have been Completed 


possible otherwise. 


Figure 16 provides a rough measure of the effectiveness of the applications 
development environment, including PCS/ADS, currently in place at The Univer- 
sity of Iowa Hospitals. It shows the number of major applications completed 
each year since the Department's inception. Those completed to date are com- 
prised of 350 PCS functions (equivalent to transaction types), with 2,000 dif- 
ferent screen definitions. While the increased rate after 1978 is not entirely 
due to the use of PCS/ADS, its use was certainly a factor. 


Disadvantages of PCS/ADS 


So far, I've discussed the advantages of using PCS/ADS. There are also some 
disadvantages. The first is the additional processing overhead that is in- 
curred, compared to CICS macro-level, assembler-coded transactions. Since we 
also began using the IMS Data Base Manager and CICS command-level PL/I coding 
in the same time frame that we began using PCS, it is difficult to quantify 
the amount of additional overhead that can be attributed to PCS. We have not 
considered it to be prohibitive. 


Two more problems are a direct result of the ease with which new application 
systems can be created with PCS. Part of the ease of use of PCS is due to the 
high level at which it allows the application developer to work. He is isolated 
from machine procedures and physical data structures. However, this feature 
also makes it easy to develop transactions that suffer from poor performance 


Year 


70 71 72 73 74 75 76 77 eas 80 81 82 


Start of use 
of PCS/ADS 


APPLICATION DEVELOPMENT RATE AT 
UNIVERSITY OF IOWA HOSPITALS 
Figure 16 
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and use excessive system resources. For this reason, and because of the rapid 
rate at which new applications can be developed, it is particularly important 
in a PCS environment to do an effective job of predicting and tracking system 
resource usage. 


There are three more "technical" problems that currently affect the use of 
PCS/ADS. First, all PCS transactions run under a single CICS transaction name. 
To CICS, PCS is a single transaction. This prevents assigning differing prior- 
ities to different PCS-based applications.. Second, the PCS execution modules 
are written in CICS macro-level Assembler language. Some new CICS facilities 
can only be used with command level transactions. Finally, the PCS DCL pro- 
cessor runs as a conversational transaction, causing data areas for DCL-based 
transactions to tie up virtual storage for long periods of time. We have not 
considered any of these problems to be prohibitive to our use of PCS. Indeed, 
some of them are by-products of its overriding advantages. In addition, we are 
optimistic that the technical problems cited above will be resolved. 


Summary 


PCS/ADS is a general purpose, CICS-based application generator that has been in 
use at The University of Iowa Hospitals since 1978. It's primary advantages 
are: 


1. The development cycle is speeded up due to the minimal requirements 
for conventional programming. 


2.  PCS/ADS facilitates system prototyping and an iterative development 
process. a 


3. The reduction of conventional programming requirements allows the 
. systems developer to concentrate on understanding user requirements 
and on system analysis and design. 


4. The systems developer has the flexibility to use screen descriptions, 
Data Collection Lists, or conventional programs to implement PCS/ADS 
transactions. 


5. Users are kept involved by the iterative development process and 
may also create or modify screen and print formats. 


6. PCS/ADS includes a good, high-level test facility. 
We have found these advantages to far outweigh its disadvantages. In conjunc- 


tion with the other application-development tools and the development method- 
ologies in use here, PCS/ADS has proven to be an effective and valuable tool. 
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ABSTRACT 


Consistently defined and applied application development and maintenance 
measurements are essential to a program to improve the application development 
and maintenance activity in an organization. .Those measures are required: 


To identify and promote practices which help. 
To identify and avoid practices which hurt. 
To support rational estimating processes. 

To portray productivity improvement trends. 
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These basic objectives of productivity measurement will be used to define a 
measure called Function Points. Experience with this measure will be described. 
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